home *** CD-ROM | disk | FTP | other *** search
/ Enter 2010 January / ENTER_2010_01.iso / Programy / Gry / Base_Invaders_ / BaseInvadersSetup1.3.exe / {app} / Scripts / NightTest.lua < prev    next >
Encoding:
Text File  |  2007-01-25  |  737 b   |  46 lines
  1. G.SetGroup( "Cam" )
  2. local Cam = G.Create( "Data/BasicCamera.xml");
  3. local pos = Vector3(50,60,50);
  4. Cam.SetPosition( pos );
  5. G.File( "Data/Terra.xml");
  6.  
  7.  
  8. function DooDad()
  9.     if( G.KeyTriggered( "F" ) ) then
  10.         local d = G.Create( "Data/LargePineTree.xml" );
  11.         local mpos = G.GetTerrainIntersection();
  12.         d.SetPosition( mpos );
  13.     end            
  14. end
  15.         
  16.         
  17.  
  18.  
  19.     
  20.             
  21. GMain[ "DooDad" ] = DooDad;        
  22.  
  23. function ScreenCapFunc()            
  24.     if( G.KeyTriggered( "C" ) ) then
  25.         G.ScreenCap()
  26.     end
  27.     
  28.     if( G.KeyTriggered( "N" ) ) then
  29.         G.LightCycle()
  30.     end
  31.  
  32.     if( G.KeyTriggered( "I" ) ) then
  33.         G.IncreaseLight()
  34.     end
  35.     
  36.     
  37.     if( G.KeyTriggered( "K" ) ) then
  38.         G.DecreaseLight()
  39.     end
  40.         
  41. end
  42.  
  43.  
  44. GMain["ScreenCapFunc"] = ScreenCapFunc;
  45.  
  46.